home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 007 / cstdio.arc / SRC.ARC / SHOW.A < prev    next >
Text File  |  1985-02-08  |  649b  |  48 lines

  1. ;    show.a - return register values.
  2. ;    (C) Copyright 1984 Cray Research Inc. - All Rights Reserved.
  3. ;    G. R. Mansfield.  84/12/26.
  4. ;    Ver 1.1-5208.
  5.  
  6.  
  7.     cseg
  8.     public    _showes_
  9.     public    _showcs_
  10.     public    _showss_
  11.     public    _showds_
  12.     public    _showsp_
  13.  
  14.  
  15. ;    SEGBASE showes()    /* return ES register */
  16.  
  17. _showes_:
  18.     mov    ax,es
  19.     ret
  20.  
  21.  
  22. ;    SEGBASE showcs()    /* return CS register */
  23.  
  24. _showcs_:
  25.     mov    ax,cs
  26.     ret
  27.  
  28.  
  29. ;    SEGBASE showss()    /* return SS register */
  30.  
  31. _showss_:
  32.     mov    ax,ss
  33.     ret
  34.  
  35.  
  36. ;    SEGBASE showds()    /* return DS register */
  37.  
  38. _showds_:
  39.     mov    ax,ds
  40.     ret
  41.  
  42.  
  43. ;    SEGSIZE showsp()    /* return SP register */
  44.  
  45. _showsp_:
  46.     mov    ax,sp
  47.     ret
  48.